# = test.blogs.2.rb - My Blogs, Blog Change Settings Test
# 
# See LICENSE.txt for licensing details.
#
# == Description
# This will test the settings of the "About My Blog" wherein when a visitor  click on 
#the About link for the blog they will see the contents displayed below.
#
require 'watir'
include Watir
require 'test/unit'
require '../watir.config.rb'
require '../resources/functions.rb'

class TC_BlogChangeAboutSettings_test < Test::Unit::TestCase
   
    def startup
      $Title = randomChar(10)
      $Description = randomChar(100)
      @@ie = Watir::IE.start($SITE_URL)
    end
    
    def ie
      if defined? @@ie
        @@ie
      else
        startup
      end
    end
    
    def test_01_verifyHomeText
        assert(ie.contains_text(/Community Server/))		
    end
      
    def test_02_verifyLoginLinksExist
      if !(ie.link(:text, 'Sign in').exists?)
        ie.goto($SITE_URL + 'logout.aspx')
        ie.refresh
        ie.goto($SITE_URL)
        ie.refresh
      end
	  end
    
    def test_03_navigateToLogin
      ie.link(:text, 'Sign in').click
      assert(ie.contains_text("Sign in name"))
    end
	  
	  def test_04_populateLoginForm
      ie.text_field(:id, /username$/).value = $ADMIN_USER
      assert(ie.text_field(:id, /username$/).verify_contains($ADMIN_USER))
      
      ie.text_field(:id, /password$/).value = $ADMIN_PASSWORD
      assert(ie.text_field(:id, /password$/).verify_contains($ADMIN_PASSWORD))
	  end
	  
    def test_05_submitLoginForm
      ie.link(:id, /loginButton$/).click
      test_01_verifyHomeText
    end
    
    def test_06_verifyControlPanel
      assert(ie.link(:text, /Control Panel/).exists?)
      ie.link(:text, /Control Panel/).click
      assert(ie.contains_text(/Community Server Announcements/))
      assert(ie.link(:text, /Administration/).exists?)
      ie.link(:text, /Administration/).click
      assert(ie.contains_text(/Community Server Announcements/))
    end
    
    def test_07_verifyControlPanelTabBarLinks
      assert_equal $SITE_URL + 'controlpanel/default.aspx', ie.link(:text, 'Dashboard').href
      assert_equal $SITE_URL + 'controlpanel/blogs', ie.link(:text, 'My Blogs').href
      assert_equal $SITE_URL + 'controlpanel/photos/', ie.link(:text, 'My Photos').href
      assert_equal $SITE_URL + 'controlpanel/files', ie.link(:text, 'My Files').href
      assert_equal $SITE_URL + 'controlpanel/moderation', ie.link(:text, 'Forums Moderation').href
      assert_equal $SITE_URL + 'controlpanel/Setup.aspx', ie.link(:text, 'Administration').href
      assert_equal $SITE_URL + 'controlpanel/Reporting/default.aspx', ie.link(:text, 'Reporting').href
    end
    
    def test_08_navigateToAboutMyBlogPage
      ie.goto($SITE_URL + 'ControlPanel/Blogs/AboutOptions.aspx')
      
      assert(ie.contains_text('About My Blog'))
      assert(ie.contains_text('When visitors click on the About link for your blog they will see the contents displayed below'))
    end
    
    def test_09_verifyLinksExistOnAboutMyBlogPage
      assert(ie.link(:text, 'Help').exists?)
      assert(ie.link(:text, 'Inbox').exists?)
      assert(ie.link(:text, 'Exit Control Panel and Return to Site').exists?)
      assert(ie.link(:text, 'Dashboard').exists?)
      assert(ie.link(:text, 'My Blogs').exists?)
      assert(ie.link(:text, 'My Photos').exists?)
      assert(ie.link(:text, 'My Files').exists?)
      assert(ie.link(:text, 'Forums Moderation').exists?)
      assert(ie.link(:text, 'Administration').exists?)
      assert(ie.link(:text, 'Reporting').exists?)
      assert(ie.link(:text, 'All Posts').exists?)
      assert(ie.link(:text, 'All Comments').exists?)
      assert(ie.link(:text, 'All Pages').exists?)
      assert(ie.link(:text, 'Tags / Keywords').exists?)
      assert(ie.link(:text, 'All Lists').exists?)
      assert(ie.link(:text, 'Manage Snippets').exists?)
      assert(ie.link(:text, 'About My Blog').exists?)
      assert(ie.link(:id, /SaveButton$/).exists?)
    end
    
    def test_10_verifyAboutMyBlogPageFieldsExist
      assert(ie.radio(:id, /ynEnableAbout_0$/).exists?)
      assert(ie.radio(:id, /ynEnableAbout_1$/).exists?)
      assert(ie.text_field(:id, /TaskRegion_AboutTitle$/).exists?)
    end
    
    def test_11_saveAboutMyBlogPageInformation
      ie.text_field(:id, /TaskRegion_AboutTitle$/).value = $Title
      ie.ie.Document.parentWindow.execScript("tinyMCE.getInstanceById(tinyMCE.getEditorId('mce_editor_0')).execCommand('mceSetContent', false, '" + $Description + "')")
      ie.link(:id, /SaveButton$/).click      
      
      assert(ie.contains_text("Your options have been successfully saved"))
    end
    
    def test_99_closeIE
      ie.close
    end
end